function AT2_Send(channel, message,external)
	message=AT2_AutoReplace(message)
	if not(channel==AT2_UI_CCB6Text:GetText()) then
		SendChatMessage(message, channel)
	else
	AT2_Print("externalchannel true, M: "..message..", Ch: "..external,"debug","AT2_Send, extch true")
		SendChatMessage(message, "CHANNEL",nil, GetChannelName(external))
	end
end

function AT2_MessageModeAutoSend(remain, sender)
AT2_MessageModeRemain=remain
	if (AT2_Activated==1 and AT2_Mode=="2") then
		if not(sender==UnitName("player")) then
			if not(AT2_MessageModeRemain <1) then
				AT2_MessageModeRemain=AT2_MessageModeRemain-1
			else
				AT2_MessageModeRemain=AT2_SendMMInterval-1
				AT2_Send(AT2_Channel,AT2_message, AT2_ExternalChannel)
			end
			AT2_UI_SetStatusBar(AT2_MessageModeRemain.." üzenet maradt a következö küldésig","l")
			AT2_LDB_SetText("Még "..AT2_MessageModeRemain.." üzenet")
			AT2_LDB_UpdateTooltip()
			AT2_Print("interval: "..AT2_SendMMInterval,"debug","AT2_MessageModeAutoSend")
		end
	end
end

function AT2_TimedAutoSend()
	if (AT2_Activated==1) then
		if (AT2_sendat-time()<1) then
			AT2_sendat = time()+AT2_SendInterval
			AT2_Send(AT2_Channel,AT2_message, AT2_ExternalChannel)
		end
		AT2_LDB_SetText("Még "..AT2_TotalTime(AT2_sendat-time()))
		AT2_LDB_UpdateTooltip()
		AT2_UI_SetStatusBar(AT2_TotalTime(AT2_sendat-time()).." maradt a következö küldésig","l")
		AT2_Print("remain: "..AT2_sendat-time(),"debug","AT2_TimedAutoSend")
		AT2_Wait(1,AT2_TimedAutoSend)
	end
end

function AT2_AutoReplace(text)
	itemlink_pattern_itemID_x0 ="|cff%x%x%x%x%x%x|Hitem:()%d+():%d+:%d+:%d+:%d+:%d+:%d+:%d+:%d+|h%b[]|h|rx()0()"
	if (text:find(itemlink_pattern_itemID_x0)) then
		local ipos1,ipos2,ipos3,ipos4=text:match(itemlink_pattern_itemID_x0)
		local itemcount = (GetItemCount(text:sub(ipos1,ipos2-1))) 
		return text:sub(1,ipos3-1)..itemcount..text:sub(ipos4)
	else 
		return text
	end
end

if not(AT2_ModuleList) then
AT2_ModuleList = {}
end
tinsert(AT2_ModuleList,"Send");